-- background: 2655 from stack: in.3
-- bmap block id: 3081
-- flags: 0000
-- background id: 0
-- name: 
----- HyperTalk script -----
on curlall
  repeat with count = 1 to the number of cards
    go card count
    curlem
  end repeat
end curlall





on curlem
  repeat with count = 1 to the number of bkgnd fields
    get bkgnd field count
    put "First" into flag
    repeat until quote is not in it
      if flag is "first" then
        put "“" into char offset(quote,it) of it
        put empty into flag
      else
        put "”" into char offset(quote,it) of it
        put "First" into flag
      end if
    end repeat
    repeat until "'" is not in it
      put "’" into char offset( "'",it) of it
    end repeat
    put it into field count
  end repeat
  repeat with count = 1 to the number of cd fields
    get cd field count
    put "First" into flag
    repeat until quote is not in it
      if flag is "first" then
        put "“" into char offset(quote,it) of it
        put empty into flag
      else
        put "”" into char offset(quote,it) of it
        put "First" into flag
      end if
    end repeat
    repeat until "'" is not in it
      put "‘" into char offset( "'",it) of it
    end repeat
    put it into cd field count
  end repeat
end curlem



on findbtn
  lock screen
  get the short name of the target
  find it in field "title"
  unlock screen with visual barn door open
end findbtn




-- part 3 (field)
-- low flags: 00
-- high flags: 0000
-- rect: left=29 top=22 right=45 bottom=343
-- title width / last selected line: 0
-- icon id / first selected line: 0 / 0
-- text alignment: 0
-- font id: 2
-- text size: 18
-- style flags: 10240
-- line height: 24
-- part name: Title
----- HyperTalk script -----
on closefield
  set the name of this card to char 1 to 27 of target
end closefield


-- part 11 (field)
-- low flags: 02
-- high flags: 0000
-- rect: left=24 top=51 right=72 bottom=406
-- title width / last selected line: 0
-- icon id / first selected line: 0 / 0
-- text alignment: 0
-- font id: 2
-- text size: 12
-- style flags: 0
-- line height: 16
-- part name: Sub-Title


-- part 4 (field)
-- low flags: 00
-- high flags: 0000
-- rect: left=22 top=69 right=283 bottom=485
-- title width / last selected line: 0
-- icon id / first selected line: 0 / 0
-- text alignment: 0
-- font id: 2
-- text size: 12
-- style flags: 0
-- line height: 16
-- part name: Text


-- part 16 (field)
-- low flags: 02
-- high flags: 0000
-- rect: left=353 top=303 right=317 bottom=431
-- title width / last selected line: 0
-- icon id / first selected line: 0 / 0
-- text alignment: 0
-- font id: 2
-- text size: 10
-- style flags: 0
-- line height: 13
-- part name: More


-- part 25 (button)
-- low flags: 00
-- high flags: 2000
-- rect: left=26 top=299 right=319 bottom=53
-- title width / last selected line: 0
-- icon id / first selected line: 19381 / 19381
-- text alignment: 1
-- font id: 0
-- text size: 12
-- style flags: 0
-- line height: 16
-- part name: Prev
----- HyperTalk script -----
on mouseUp
  visual barn door close
  go card "table of contents"
end mouseUp



-- part 26 (button)
-- low flags: 00
-- high flags: 2000
-- rect: left=454 top=297 right=321 bottom=482
-- title width / last selected line: 0
-- icon id / first selected line: 11045 / 11045
-- text alignment: 1
-- font id: 0
-- text size: 12
-- style flags: 0
-- line height: 16
-- part name: Home
----- HyperTalk script -----
on mouseUp
  visual iris open
  go Home
end mouseUp



-- part 27 (button)
-- low flags: 00
-- high flags: A000
-- rect: left=50 top=301 right=317 bottom=104
-- title width / last selected line: 0
-- icon id / first selected line: 0 / 0
-- text alignment: 1
-- font id: 2
-- text size: 10
-- style flags: 0
-- line height: 13
-- part name: Contents
----- HyperTalk script -----
on mouseUp
  visual barn door close
  go card "Table of Contents"
end mouseUp



-- part 28 (button)
-- low flags: 00
-- high flags: 2000
-- rect: left=323 top=300 right=320 bottom=350
-- title width / last selected line: 0
-- icon id / first selected line: 22308 / 22308
-- text alignment: 1
-- font id: 0
-- text size: 12
-- style flags: 0
-- line height: 16
-- part name: Next
----- HyperTalk script -----
on mouseUp
  visual wipe left
  go next
end mouseUp



-- part 29 (button)
-- low flags: 00
-- high flags: 2000
-- rect: left=160 top=299 right=319 bottom=187
-- title width / last selected line: 0
-- icon id / first selected line: 19381 / 19381
-- text alignment: 1
-- font id: 0
-- text size: 12
-- style flags: 0
-- line height: 16
-- part name: Prev
----- HyperTalk script -----
on mouseUp
  visual wipe right
  go prev
end mouseUp